home *** CD-ROM | disk | FTP | other *** search
/ Dark Star 2 / Dark_Star_02_1995_-_de_Side_B.d64 / war games (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  14KB  |  435 lines
  1. 10 clr:restore:poke29,0:goto2055
  2. 20 a$="     do you want a printout of the                  instructions"
  3. 25 tl=1:gosub1725:print"[157]  "
  4. 30 getr$:ifr$=""then30 
  5. 35 ifr$<>"y"thenreturn
  6. 40 open4,4,7:cmd4
  7. 45 print chr$(14) tab(15)"[215][193][210] [199][193][205][197][211]"
  8. 50 fors=1to8:print:next
  9. 55 printchr$(14)"            [193][212][212][193][195][203] [204][207][195][193][212][201][207][206][211]"
  10. 60 printchr$(10):printchr$(10)
  11. 65 printchr$(14)"  [213].[211]. [195]ities         [213].[211].[211].[210]. [195]ities ":print
  12. 70 printchr$(15)
  13. 75 print"      [206]ew [217]ork   [215]ashington ";tab(17);" [205]oscow";
  14. 80 print"       [204]eningrad"
  15. 85 print"      [195]hicago    [204]os [193]ngeles";tab(16);"  [207]msk";tab(9);"[195]helyabinski"
  16. 90 print"      [206]orad      [203]ansas [195]ity";tab(18);"[196]onetsk";tab(6);"[203]iev"
  17. 95 print"      [196]allas     [208]hiladelphia";tab(17);"[205]insk";tab(8);
  18. 100 print"[195]entral [210]ussia"
  19. 105 print"      [211]eattle    [206]orth [196]akota";tab(17);"[211]aratov";tab(6);"[212]ashkent"
  20. 110 print"      [196]enver     [193]lbuquerque";tab(18);"[193]lma-[193]ta";tab(5);"[203]har'kov"
  21. 115 print"      [211]t. [204]ouis";tab(31);"[199]orky":printchr$(10):printchr$(10)
  22. 120 print"      [213]se joystick back then foreward";
  23. 125 print" to enable missles when prompted.":print
  24. 130 print"      [213]se the restore key any time to escape from a game in progress."
  25. 135 print"      [196]o not, however, use restore [196][213][210][201][206][199] speech."
  26. 140 printchr$(12):print#4:close4:return
  27. 145 poke53281,0:poke53280,0:clr:restore
  28. 150 print"[147]"
  29. 155 tl=0:sp=10:gosub1720
  30. 160 print"[157] ":tl=1:sp=10:gosub1720
  31. 165 print"[157] ":tl=2:sp=10:gosub1720
  32. 170 gosub2130
  33. 175 ifp4$="joshua"thenprint"[157] ":goto260
  34. 180 ifp4$="help games"then220
  35. 185 ifp4$="games 1"then495
  36. 190 ifp4$="help"orp4$="help logon"then205
  37. 195 a$="password not recognized by system":print"[157] ":tl=3:gosub1725
  38. 200 a$="connection is terminated":print"[157] ":tl=4:gosub1725:print"[157] ":goto145
  39. 205 print"[157] ":a$="---help not available---":tl=tl+2:gosub1725:print"[157] "
  40. 210 restore:foru=1to2:reada$:nextu:tl=2:foraq=1to1000:nextaq
  41. 215 print"[147]":gosub1720:goto170
  42. 220 a$="falkens maze":print"[147]":print"[157] ":tl=1:gosub1725:print"[157]  "
  43. 225 a$="checkers":print"[157] ":tl=2:gosub1725:print"[157]  "
  44. 230 a$="chess":print"[157] ":tl=3:gosub1725:print"[157]  "
  45. 235 a$="poker":print"[157] ":tl=4:gosub1725:print"[157]  "
  46. 240 a$="guerrilla warfare":print"[157] ":tl=5:gosub1725:print"[157]  "
  47. 245 a$="chemical and biotoxic warfare":print"[157] ":tl=6:gosub1725:print"[157]  "
  48. 250 a$="global thermonuclear war":print"[157] ":tl=10:gosub1725:print"[157] "
  49. 255 goto210
  50. 260 print"[147]":a$="greetings professor falken":tl=0:gosub1725:print"[157] "
  51. 265 print:print"  [146]";
  52. 270 gosub2130
  53. 275 print:tl=5:a$="how are you today?":gosub1725:print"[157] ";:print
  54. 280 print:print" ";" [146]";
  55. 285 gosub2130
  56. 290 print:tl=9:a$="shall we play a game":gosub1725:print"[157] ";:print
  57. 295 print:print" ";" [146]";:p4$=""
  58. 300 gosub2130
  59. 305 ifleft$(p4$,1)="y"orp4$="ok"thenpoke29,0:goto350
  60. 310 poke29,0
  61. 315 ifp4$="love to"orp4$="i'd love to"then350
  62. 320 ifp4$="love to."orp4$="i'd love to."then350
  63. 325 ifleft$(p4$,1)="n"thenpoke29,0:goto345
  64. 330 poke29,0
  65. 335 print:tl=13:a$="invalid request.system reset":gosub1725:print"[157] ";:print
  66. 340 forqw=1to2000:next:goto145
  67. 345 a$="good by for now professor":tl=13:gosub1725:print"[157] ";:goto1715
  68. 350 poke792,207:poke793,2:poke720,7:poke739,52:poke743,169:poke744,48
  69. 355 poke749,50:poke754,13:poke758,0:poke53280,0:poke53281,0:print""
  70. 360 a$="falkens maze":print"[147]":print"[157] ":tl=1:gosub1725:print"[157]  "
  71. 365 a$="checkers":print"[157] ":tl=2:gosub1725:print"[157]  "
  72. 370 a$="chess":print"[157] ":tl=3:gosub1725:print"[157]  "
  73. 375 a$="poker":print"[157] ":tl=4:gosub1725:print"[157]  "
  74. 380 a$="guerilla warfare":print"[157] ":tl=5:gosub1725:print"[157]  "
  75. 385 a$="chemical and biotoxic warfare":print"[157] ":tl=6:gosub1725:print"[157]  "
  76. 390 a$="global thermonuclear war":print"[157] ":tl=10:gosub1725:print"[157] "
  77. 395 a$="choose one":print"[157] ":tl=12:gosub1725:print"[157] "
  78. 400 print:print:tl=14:print"  [146]";:goto405
  79. 402 goto350
  80. 405 p3$=" "
  81. 410 gosub2130
  82. 415 ifleft$(p4$,4)="glob"thenpoke29,0:goto460
  83. 420 poke29,0:ifp4$="falkens maze"then2090
  84. 425 ifp4$="checkers"then2095
  85. 430 ifp4$="chess"then2100
  86. 435 ifp4$="poker"then2105
  87. 440 ifleft$(p4$,4)="chem"thenpoke29,0:goto2110
  88. 445 ifp4$="guerilla warfare"then2115
  89. 450 poke29,0
  90. 455 a$="game not available":tl=16:gosub1725:print"[157]  ":goto350
  91. 460 a$="wouldn't you prefer a good game of":tl=16:gosub1725:print"[157]  "
  92. 465 a$="chess":tl=16:gosub1725:print"[157]  ":p4$="":print:print" ";" [146]";
  93. 470 gosub2130
  94. 475 ifleft$(p4$,1)="y"orp4$="ok"thenp4$="chess":poke29,0:goto430
  95. 480 poke29,0
  96. 485 a$="fine":tl=18:gosub1725
  97. 490 print"[157] ";
  98. 495 gosub2005
  99. 500 poke53281,0:poke53280,0:print"[154]"
  100. 505 ifsd=1orsd=3thenprint"[147]enter attack location";:say"enter attack location.":inputat$
  101. 510 print"[147]"
  102. 515 print"
  103. 520 [153]"                               (NULL)tab(tab((NULL)
  104. 525 print"   [186][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][205]      [206]   [206]"
  105. 530 print"   [165]                    [205]    [206]   [206]"
  106. 535 print"   [165]                     [205][164][164][206]   [206]"
  107. 540 print"   [165]                    [172]     [172][206]"
  108. 545 print"   [165]                . .        [165]"
  109. 550 print"   [165]     norad                [206]"
  110. 555 print"   [205]       [218]                  [165]"
  111. 560 print"    [205]                         [165]"
  112. 565 print"     [205][187]                      [206] "
  113. 570 print"      [205][164][164][164][164][164][164][164][164]             [206]  "
  114. 575 print"               [205]           [206]   "
  115. 580 print"                [205]  [206][183][183][183][183][205] [167]    "
  116. 585 print"                 [205][206]     [167] [167]    "
  117. 590 print"                         [205][206]
  118. 595 [139]sd[179][177]1[175]sd[179][177]3[167]1120
  119. 600 [139]at$[178]"chicago"[167]680
  120. 605 [139]at$[178]"los angeles"[167]750
  121. 610 [139]at$[178]"new york"[167]765
  122. 615 [139]at$[178]"kansas city"[167]780
  123. 620 [139]at$[178]"st.louis"[176]at$[178]"st. louis"[167]795
  124. 625 [139]at$[178]"saint louis"[167]795
  125. 630 [139]at$[178]"philadelphia"[167]810
  126. 635 [139]at$[178]"north dakota"[167]825
  127. 640 [139]at$[178]"albuquerque"[167]840
  128. 645 [139]at$[178]"denver"[167]915
  129. 650 [139]at$[178]"washington d.c."[176]at$[178]"washington,d.c."[167]855
  130. 655 [139]at$[178]"washington"[167]855
  131. 660 [139]at$[178]"dallas"[167]870
  132. 665 [139]at$[178]"seattle"[167]885
  133. 670 [139]at$[178]"norad"[167]900
  134. 675 [137]505
  135. 680 [153]"attack location chicago":say"attack location chicogo."
  136. 685 ch[178]ch[170]1:[139]ch[179][177]1[167]505
  137. 690 de[178]2.9:nk[178]0:z[178]24:k[178]5
  138. 695 [153]"":[129]t[178]1[164]k:[153][163]z);"syspeek":[129]n[178]1[164]500:[130]n:[130]t
  139. 700 [153][163]z);"sys*":[129]t[178]1[164]300:[130]
  140. 705 z[178]z[171]3:[153][163]z);"onononsys(NULL) (NULL) (NULL) (NULL)
  141. 710 z=z+1:printtab(z);"[158][213][195][195][195][201]":
  142. 715 printtab(z);"[158][199] * [200]"
  143. 720 printtab(z);"[158][202][195][195][195][203]
  144. 725 z[178]z[171]1:[153][163]z);"sys(NULL) (NULL) (NULL) (NULL)"
  145. 730 [153]""
  146. 735 [129]tr[178]1[164]500:[130]
  147. 740 [139]su[178]1[167]1510 
  148. 745 [137]930
  149. 750 [153]"attack location los angeles":say"attack location los angelees."
  150. 755 la[178]la[170]1:[139]la[179][177]1[167]505
  151. 760 de[178]2:nk[178]25:z[178]6:k[178]10:[137]695
  152. 765 [153]"attack location new york":say"attack location new york."
  153. 770 ny[178]ny[170]1:[139]ny[179][177]1[167]505
  154. 775 de[178]6.7:nk[178]0:z[178]31:k[178]5:[137]695
  155. 780 [153]"attack location kansas city":say"attack location kansas city."
  156. 785 kc[178]kc[170]1:[139]kc[179][177]1[167]505
  157. 790 de[178].4:nk[178]54:z[178]20:k[178]6:[137]695
  158. 795 [153]"attack location st. louis":say"attack location saint luis."
  159. 800 sl[178]sl[170]1:[139]sl[179][177]1[167]505
  160. 805 de[178].4:nk[178]18:z[178]22:k[178]6:[137]695
  161. 810 [153]"attack location philadelphia":say"attack location philad elphia."
  162. 815 ph[178]ph[170]1:[139]ph[179][177]1[167]505
  163. 820 de[178]1.7:nk[178]0:k[178]6:z[178]29:[137]695
  164. 825 [153]"attack location north dakota":say"attack location north dakoatta."
  165. 830 nd[178]nd[170]1:[139]nd[179][177]1[167]505
  166. 835 de[178].4:nk[178]68:z[178]18:k[178]3:[137]695
  167. 840 [153]"attack location albuquerque":say"attack location albuhkerkey."
  168. 845 ab[178]ab[170]1:[139]ab[179][177]1[167]505
  169. 850 de[178].3:nk[178]61:z[178]12:k[178]10:[137]695
  170. 855 [153]"attack location washington":say"attack location washington."
  171. 860 ws[178]ws[170]1:[139]ws[179][177]1[167]505
  172. 865 de[178].9:nk[178]0:z[178]29:k[178]7:[137]695
  173. 870 [153]"attack location dallas":say"attack location daalas."
  174. 875 dl[178]dl[170]1:[139]dl[179][177]1[167]505
  175. 880 de[178].9:nk[178]21:k[178]11:z[178]18:[137]695
  176. 885 [153]"attack location seattle":say"attack location seaattle."
  177. 890 s(1)[178]s(1)[170]1:[139]s(1)[179][177]1[167]505
  178. 895 de[178].5:nk[178]4:k[178]3:z[178]4:[137]695
  179. 900 [153]"attack location norad":say"attack location norad."
  180. 905 nr[178]nr[170]1:[139]nr[179][177]1[167]505
  181. 910 de[178].1:nk[178]24:z[178]11:k[178]8:[137]695
  182. 915 [153]"attack location denver":say"attack location denver."
  183. 920 dn[178]dn[170]1:[139]dn[179][177]1[167]505
  184. 925 de[178].5:nk[178]45:z[178]12:k[178]6:[137]695
  185. 930 [139]sd[178]0[167]1105
  186. 935 [153]"loadtotal dead: ";de;"million":he[178][181](50[172][187](1))[170]50
  187. 940 de[178]de[172]1000000
  188. 945 [153]"housing destroyed: ";he;"%"
  189. 950 he[178]he[172]137000
  190. 955 he[178]he[170](nk[172]52000)
  191. 960 [153]"total damage cost: $";he
  192. 965 df[178]1:[153]"nuclear war heads destroyed";nk:us1[178]us1[170](de[170]he)
  193. 970 [153][163]30);"ononononononondefcon"
  194. 975 [153][163]32);"(NULL)usr(NULL)"
  195. 980 [153][163]32);"sgn5+
  196. 985 printtab(32);"[207][183][208]
  197. 990 [153][163]32);"sgn4+
  198. 995 printtab(32);"[207][183][208]
  199. 1000 [153][163]32);"sgn3+
  200. 1005 printtab(32);"[207][183][208]
  201. 1010 [153][163]32);"sgn2+
  202. 1015 printtab(32);"[150][207][183][208]
  203. 1020 [153][163]32);"sgn1def+
  204. 1025 printtab(32);"[204][175][186]
  205. 1030 say"here is the sta tisticks."
  206. 1035 [153]"ononononu.s. counter attack has begun"
  207. 1040 say"u s  counter attack has begun."
  208. 1045 [139]sd[178]2[167]1060
  209. 1050 [153]"10 seconds to visibility"
  210. 1055 say"ten seconds to visebility."
  211. 1060 [153]"     hit any key to continue":say"hit any key.":[139]sd[178]2[167]1085
  212. 1065 [139]sd[179][177]0[167][161]eq$:[139]eq$[178]""[167]1065
  213. 1070 [139]sd[179][177]0[167]:say"t mi nus ten seconds.":[129]im[178]10[164]0[169][171]1:[129]mi[178]1[164]500:[130]mi
  214. 1075 [139]sd[179][177]0[167][153]"load      t minus "im;[163]re);"and counting"
  215. 1080 [139]sd[179][177]0[167][130]im:[139]im[178]10[167]re[178][171]1
  216. 1085 p[178]p[170]1:[139]p[178]6[167]1610
  217. 1090 [139]sd[179][177]2[167]1210
  218. 1095 [161]eq$:[139]eq$[178]""[167]1095
  219. 1100 [137]1210
  220. 1105 he[178][181](50[172][187](1))[170]50
  221. 1110 de[178]de[172]1000000:he[178]he[172]137000:he[178]he[170](nk[172]52000):us1[178]us1[170](de[170]he)
  222. 1115 [137]1085
  223. 1120 a[178][181](13[172][187](1))[170]1
  224. 1125 [145]a[137]680,750,765,780,795,915,825,840,810,855,870,885,900
  225. 1130 yu[178]1:ww$[178]"loadenter attack location":[153]ww$:sayww$
  226. 1135 [153]"";:[133]"                      ";w$
  227. 1140 [141]1435:[139]w$[178]"moscow"[167]1235
  228. 1145 [139]w$[178]"leningrad"[167]1265
  229. 1150 [139]w$[178]"minsk"[167]1280
  230. 1155 [139]w$[178]"kiev"[167]1295
  231. 1160 [139]w$[178]"central russia"[167]1310
  232. 1165 [139]w$[178]"tashkent"[167]1325
  233. 1170 [139]w$[178]"gorky"[167]1355
  234. 1175 [139]w$[178]"omsk"[167]1370
  235. 1180 [139]w$[178]"alma-ata"[167]1400
  236. 1185 [139]w$[178]"chelyabinski"[167]1385
  237. 1190 [139]w$[178]"kharkov"[176]w$[178]"khar'kov"[167]1415
  238. 1195 [139]w$[178]"saratov"[167]1250
  239. 1200 [139]w$[178]"donetsk"[167]1340
  240. 1205 ww$[178]"attack location not available":[153]ww$:sayww$:[129]sb[178]1[164]1250:[130]:[137]1130
  241. 1210 a[178][181](13[172][187](1))[170]1:yu[178]1:su[178]1
  242. 1215 [139]sd[178]2[176]sd[178]3[167]1780
  243. 1220 [139]sd[178]2[176]sd[178]3[167]1130
  244. 1225 [141]1435
  245. 1230 [145]a[137]1235,1250,1265,1280,1295,1310,1325,1340,1355,1370,1385,1400,1415
  246. 1235 mc[178]mc[170]1:[139]mc[179][177]1[167]1210
  247. 1240 [153]" attack location moscow":say"attack location moscou."
  248. 1245 do[178]6.3:nk[178]0:z[178]8:k[178]9:[137]695
  249. 1250 sr[178]sr[170]1:[139]sr[179][177]1[167]1210
  250. 1255 [153]" attack location saratov":say"attack location saratov."
  251. 1260 do[178].9:nk[178]7:z[178]12:k[178]10:[137]695
  252. 1265 le[178]le[170]1:[139]le[179][177]1[167]1210
  253. 1270 [153]" attack location leningrad":say"attack location lenin grad."
  254. 1275 do[178]3:nk[178]8:k[178]7:z[178]8:[137]695
  255. 1280 mn[178]mn[170]1:[139]mn[179][177]1[167]1210
  256. 1285 [153]" attack location minsk":say"attack location minsk."
  257. 1290 do[178]1.1:nk[178]4:z[178]7:k[178]8:[137]695
  258. 1295 kv[178]kv[170]1:[139]kv[179][177]1[167]1210
  259. 1300 [153]" attack location kiev":say"attack location ke ev."
  260. 1305 do[178]1.1:nk[178]4:z[178]7:k[178]8:[137]695
  261. 1310 mr[178]mr[170]1:[139]mr[179][177]1[167]1210
  262. 1315 [153]" attack location central russia":say"attack location central rusha."
  263. 1320 do[178].3:nk[178]42:z[178]24:k[178]7:[137]695
  264. 1325 ts[178]ts[170]1:[139]ts[179][177]1[167]1210
  265. 1330 [153]" attack location tashkent":say"attack location tashkent."
  266. 1335 do[178]1.5:nk[178]5:z[178]11:k[178]11:[137]695
  267. 1340 ds[178]ds[170]1:[139]ds[179][177]1[167]1210
  268. 1345 [153]" attack location donetsk":say"attack location donetsk."
  269. 1350 do[178]1.1:nk[178]23:z[178]12:k[178]11:[137]695
  270. 1355 gr[178]gr[170]1:[139]gr[179][177]1[167]1210
  271. 1360 [153]" attack location gorky":say"attack location gorky."
  272. 1365 do[178]1.3:nk[178]2:z[178]10:k[178]9:[137]695
  273. 1370 om[178]om[170]1:[139]om[179][177]1[167]1210
  274. 1375 [153]" attack location omsk":say"attack location omsk."
  275. 1380 do[178]1.3:nk[178]22:z[178]16:k[178]8:[137]695
  276. 1385 ch[178]ch[170]1:[139]ch[179][177]1[167]1210
  277. 1390 [153]" attack location chelyabinski":say"attack location chelabinsky."
  278. 1395 do[178]1:nk[178]10:z[178]13:k[178]9:[137]695
  279. 1400 aa[178]aa[170]1:[139]aa[179][177]1[167]1210
  280. 1405 [153]" attack location alma-ata":say"attack location aelma.aetta."
  281. 1410 do[178].9:nk[178]16:z[178]12:k[178]11:[137]695
  282. 1415 kk[178]kk[170]1:[139]kk[179][177]1[167]1210
  283. 1420 [153]" attack location khar'kov":say"attack location kar kov."
  284. 1425 do[178]1.5:nk[178]0:z[178]8:k[178]10:[137]695
  285. 1430 [128]
  286. 1435 [153]"loaddef
  287. 1440 print"                            [206][205]
  288. 1445 [153]"              (NULL)tab(tab(tab(tab(tab(tab(tab((NULL)to(NULL)tab(tab(tab(  (NULL)
  289. 1450 print"             [206]                 [205]
  290. 1455 [153]"            (NULL)                   (NULL)
  291. 1460 print"        [206][163][205][206]                    [206]
  292. 1465 [153]"       (NULL)                       (NULL)
  293. 1470 print"      [206]                       [206]
  294. 1475 [153]"      (NULL)                      (NULL)
  295. 1480 print"       [205]         [164][164][164][164][164][206][163][163][205]   [165]
  296. 1485 [153]"        (NULL)  tototototo(NULL)         (NULL)  fn
  297. 1490 print"         [205][206]                [205] [165]
  298. 1495 [153]"                            (NULL)fn
  299. 1500 print"
  300. 1505 [139]yu[178]1[167]yu[178]0:[142]
  301. 1510 [139]sd[178]0[167]1590
  302. 1515 [153]"loadtotal dead: ";do;"million":ho[178][181](50[172][187](1))[170]50
  303. 1520 do[178]do[172]1000000
  304. 1525 [153]"housing destroyed: ";ho;"%"
  305. 1530 ho[178]ho[172]137000
  306. 1535 ho[178]ho[170](nk[172]52000)
  307. 1540 [153]"total damage cost: $";ho
  308. 1545 [153]"nuclear war heads destroyed";nk
  309. 1550 hx1[178]hx1[170](do[170]ho):p[178]p[170]1:ho[178]0:do[178]0
  310. 1555 say"here are the sta tistics."
  311. 1560 [139]p[178]8[167]1580
  312. 1565 [153]"      hit any key to continue      ":su[178]0:say"hit any key."
  313. 1570 [139]sd[179][177]0[167][161]er$:[139]er$[178]""[167]1570
  314. 1575 [137]500
  315. 1580 [139]sd[179][177]0[167][161]er$:[139]er$[178]""[167]1580
  316. 1585 [137]1610
  317. 1590 ho[178][181](50[172][187](1))[170]50
  318. 1595 do[178]do[172]1000000:ho[178]ho[172]137000:ho[178]ho[170](nk[172]52000):hx1[178]hx1[170](do[170]ho):p[178]p[170]1:ho[178]0
  319. 1600 do[178]0:su[178]0:yu[178]1:[139]p[178]8[167]1580
  320. 1605 [137]1570
  321. 1610 tl[178]0:[139]us1[177]hx1[167]1645
  322. 1615 [153]"load":a$[178]" the u.s.s.r. attack has been stopped":[141]1725:[153]"cmd "
  323. 1620 tl[178]3:a$[178]"   the final scores are:":[141]1725:[153]"cmd "
  324. 1625 tl[178]7:[153]"cont":a$[178]"united states:":[141]1725:[153]"cmd ";hx1
  325. 1630 tl[178]9:[153]"def":a$[178]"russia:       ":[141]1725:[153]"cmd ";us1
  326. 1635 tl[178]18:[153]"":a$[178]"       winner: united states":[141]1725:[153]"cmd "
  327. 1640 [137]1675
  328. 1645 tl[178]0:[153]"load":a$[178]" the u.s.s.r. attack is successful":[141]1725:[153]"cmd "
  329. 1650 tl[178]2:a$[178]"    the u.s. has been conquered":[141]1725:[153]"cmd "
  330. 1655 tl[178]5:a$[178]"    the final scores are:":[141]1725:[153]"cmd "
  331. 1660 tl[178]8:[153]"cont":a$[178]"united states:":[141]1725:[153]"cmd ";hx1
  332. 1665 tl[178]10:[153]"def":a$[178]"russia:       ":[141]1725:[153]"cmd ";us1
  333. 1670 tl[178]18:[153]"":a$[178]"       winner: u.s.s.r.":[141]1725:[153]"cmd "
  334. 1675 [129]k[178]1[164]3000:[130]:[153]"load"
  335. 1680 tl[178]0:a$[178]"  want to play nuclear war again?":[141]1725:[153]"cmd "
  336. 1685 [161]y$:[139]y$[178]""[167]1685
  337. 1690 [139]y$[178]"y"[167][156]:[140]:[129]yt[178]1[164]3:[135]pa$:[130]:[137]495
  338. 1695 tl[178]3:a$[178]"  want to return to the menu?":[141]1725
  339. 1700 [161]y$:[139]y$[178]""[167]1700
  340. 1705 [139]y$[179][177]"n"[167]350
  341. 1710 tl[178]7:a$[178]"        good-by professor!!!":[141]1725
  342. 1715 [153]"load  bye bye":say"bye bye.":[128]
  343. 1720 [135]a$
  344. 1725 a[178][195](a$):[153]
  345. 1730 [129]b[178]1[164]a:[153]"":[129]se[178]1[164]tl:[153]:[130]se:[153]"";:[139]tl[178]0[167][153]"onon"
  346. 1735 [139][200](a$,1)[178]"h"[175]tl[178]5[167][151]29,0:[153]"cmdcmd"
  347. 1740 [151]29,0
  348. 1745 [153][163]b);[202](a$,b,1);" wait";
  349. 1750 [129]c[178]1[164]sp:[130]
  350. 1755 [130]b
  351. 1760 saya$
  352. 1765 [142]
  353. 1770 [137]1675
  354. 1775 [151]29,0
  355. 1780 [137]1970
  356. 1785 [151]56322,0
  357. 1790 jv[178][194](56320)
  358. 1795 fr[178]jv[175]16
  359. 1800 jv[178]15[171](jv[175]15)
  360. 1805 [151]56322,255
  361. 1810 [142]
  362. 1815 [141]1785
  363. 1820 [139]jv[179][177]2[167]1815
  364. 1825 [141]1785
  365. 1830 [139]jv[179][177]1[167]1825
  366. 1835 [153]"def    (NULL)"
  367. 1840 [153]" enabled":say"enaebled"
  368. 1845 [141]1785
  369. 1850 [139]jv[179][177]2[167]1845
  370. 1855 [141]1785
  371. 1860 [139]jv[179][177]1[167]1855
  372. 1865 [153]"def";[163]12);"(NULL)"
  373. 1870 [153][163]9);"enabled":say"enaebled"
  374. 1875 [141]1785
  375. 1880 [139]jv[179][177]2[167]1875
  376. 1885 [141]1785
  377. 1890 [139]jv[179][177]1[167]1885
  378. 1895 [153]"def";[163]20);"(NULL)"
  379. 1900 [153][163]17);"enabled":say"enaebled"
  380. 1905 [141]1785
  381. 1910 [139]jv[179][177]2[167]1905
  382. 1915 [141]1785
  383. 1920 [139]jv[179][177]1[167]1915
  384. 1925 [153]"def";[163]28);"(NULL)"
  385. 1930 [153][163]25);"enabled":say"enaebled"
  386. 1935 [141]1785
  387. 1940 [139]jv[179][177]2[167]1935
  388. 1945 [141]1785
  389. 1950 [139]jv[179][177]1[167]1945
  390. 1955 [153]"def";[163]36);"(NULL)"
  391. 1960 [153][163]33);"enabled":say"enaebled."
  392. 1965 [153]"cont":[137]1220
  393. 1970 [153]"load            enable missles              ":say"enaeble missles."
  394. 1975 [153]"    (NULL)       (NULL)       (NULL)       (NULL)       (NULL)  "
  395. 1980 [137]1815
  396. 1985 [131]"                                      "
  397. 1990 [131]"                                      "
  398. 1995 [131]"log on:"
  399. 2000 [131]"first","second","third","forth"
  400. 2005 [153]"load"
  401. 2010 [151]792,207:[151]793,2:[151]720,7:[151]739,52:[151]743,169:[151]744,48
  402. 2015 [151]749,50:[151]754,13:[151]758,0:[151]53280,0:[151]53281,0:[153]"":[141]20
  403. 2020 tl[178]5:[153]"loaddef":a$[178]"  1.soviet union":[141]1725:[153]"cmd "
  404. 2025 tl[178]7:[153]"cont":a$[178]"  2.united states":[141]1725:[153]"cmd "
  405. 2030 tl[178]9:[153]"":a$[178]"  which side do you want?":[141]1725:[153]"cmd "
  406. 2035 [161]sd$:[139]sd$[178]""[167]2035
  407. 2040 sd[178][197](sd$)
  408. 2045 [139]sd[177]3[167]2005
  409. 2050 [142]
  410. 2055 [151]792,207:[151]793,2:[151]720,7:[151]739,13:[151]743,0:[153]"load"
  411. 2056 [139][194](49153)[179][177]187[167]2075
  412. 2060 [158]38144:[151]52,125:[151]54,125:[151]56,125:[151]53280,0:[151]53281,0
  413. 2065 ]re:]li 1:]sp 68:]pi 68:]kn 150,150:[151]38114,96
  414. 2067 [139][194](49920)[179][177]131[167]145
  415. 2070 [158]49312:[151]29,0:[151]53265,27:[151]56576,199:[151]53270,200:[151]53272,21
  416. 2072 [151]49920,0:[137]145
  417. 2075 [151]53280,6:[151]53281,6
  418. 2080 [153]"          loading sub programs  wait"
  419. 2085 [147]"sam",8,1
  420. 2090 [153]"loadload";[199](34);"falkens maze";[199](34);",8,1":[137]2120
  421. 2095 [153]"loadload";[199](34);"checkers";[199](34);",8,1":[137]2120
  422. 2100 [151]25598,0:[151]12287,200:[153]"loadload";[199](34);"chess";[199](34);",8,1":[137]2120
  423. 2105 [153]"loadload";[199](34);"poker";[199](34);",8,1":[137]2120
  424. 2110 [153]"loadload";[199](34);"bio warefare";[199](34);",8,1":[137]2120
  425. 2115 [153]"loadload";[199](34);"guerilla warfare";[199](34);",8,1":[137]2120
  426. 2120 [151]631,19:[151]632,13:[151]633,82:[151]634,117:[151]635,13:[151]198,5:[151]29,0
  427. 2125 [128]
  428. 2130 p4$[178]""
  429. 2133 [161]p3$:[139]p3$[178]""[167]2133
  430. 2135 [139]p3$[178][199](13)[167][153]"cmd ":[142]
  431. 2140 [139]p3$[178][199](20)[167][153]"cmd";[199](20);" wait";:p4$[178][200](p4$,[195](p4$)[171]1):[137]2133
  432. 2145 p4$[178]p4$[170]p3$
  433. 2150 [153]"cmd ";"cmd";p3$;" wait";
  434. 2155 [137]2133
  435.